module Codewars.Triangles where

import Data.List (sort)

isTriangle :: Int -> Int -> Int -> Bool
isTriangle a b c = x + y > z
  where
    (x:y:z:_) = sort $ a:b:c:[]
